home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Win '95 Giga Pack
/
Win95 Giga Pack (Maple Media) (1997).iso
/
EDITOR32
/
DANA104
/
SLEEP.DAS
< prev
next >
Wrap
Text File
|
1995-12-15
|
532b
|
17 lines
'-----------------------------------------------------------------------
' Sleep.DAS
' Close all the work files and minimize Dana.
' If you use this command instead of Exit function, Dana will be brought
' up immediately at the next time you run Dana.
'-----------------------------------------------------------------------
Const SW_SHOWMINIMIZED = 2
Declare Proc ShowWindow Lib "User32" (hWnd, nCmdShow) As Integer
Main ()
While .DocNum
Command("CloseFile")
Wend
ShowWindow(.hMainWnd, SW_SHOWMINIMIZED)
End